See this specific code
```{r}
#| eval: false
print(rock)
``````{r}
#| eval: false
print(rock)
```summary(rock) area peri shape perm
Min. : 1016 Min. : 308.6 Min. :0.09033 Min. : 6.30
1st Qu.: 5305 1st Qu.:1414.9 1st Qu.:0.16226 1st Qu.: 76.45
Median : 7487 Median :2536.2 Median :0.19886 Median : 130.50
Mean : 7188 Mean :2682.2 Mean :0.21811 Mean : 415.45
3rd Qu.: 8870 3rd Qu.:3989.5 3rd Qu.:0.26267 3rd Qu.: 777.50
Max. :12212 Max. :4864.2 Max. :0.46413 Max. :1300.00
'data.frame': 300 obs. of 4 variables:
$ anxiety : num 50.2 31.5 34 37.1 48.3 ...
$ flexibility: num 44.4 47.7 65.6 50.7 51.3 ...
$ mindfulness: chr "no" "yes" "no" "no" ...
$ activity : chr "pilates" "altro" "pilates" "altro" ...
summary(data) anxiety flexibility mindfulness activity
Min. : 1.483 Min. :26.91 Length:300 Length:300
1st Qu.:25.977 1st Qu.:44.24 Class :character Class :character
Median :33.922 Median :49.56 Mode :character Mode :character
Mean :33.418 Mean :50.34
3rd Qu.:41.974 3rd Qu.:56.32
Max. :64.775 Max. :82.41
Figure 1 illustrates a baby wearing a nirs cap with frontal probes.
knitr::include_graphics("img/bb.png")Figure 2 illustrates a plot
ggplot(mtcars, aes(hp, mpg, color = factor(am))) +
geom_point() +
geom_smooth(formula = y ~ x, method = "loess") +
theme(legend.position = 'bottom')mtcars